home *** CD-ROM | disk | FTP | other *** search
/ Aminet 45 / Aminet 45 (2001)(GTI - Schatztruhe)[!][Oct 2001].iso / Aminet / util / gnu / cvs-1.11.1p1.lha / contrib / dirfns.shar / telldir.c < prev   
Encoding:
C/C++ Source or Header  |  2001-02-28  |  257 b   |  17 lines
  1. static char sccsid[] = "@(#)telldir.c 4.1 2/21/82";
  2.  
  3. #include <sys/types.h>
  4. #include <dir.h>
  5.  
  6. /*
  7.  * return a pointer into a directory
  8.  */
  9. long
  10. telldir(dirp)
  11.     DIR *dirp;
  12. {
  13.     long lseek();
  14.  
  15.     return (lseek(dirp->dd_fd, 0L, 1) - dirp->dd_size + dirp->dd_loc);
  16. }
  17.